home *** CD-ROM | disk | FTP | other *** search
- *debug 1
-
- *********************************************************
- * *
- * This script file is used to configure the CODEX Modem *
- * *
- *********************************************************
-
- set_port 1
- set_speed 2400
- set_parity NO_PARITY
- set_data_bits 8
- open_comm
- iferror bye_comm
- print "Initialization successful "
-
-
- type "AT",0d,0a
- iferror bye_t1
- timeout 15
- match "OK"
- iferror bye_m1
-
- ***************************
- * *
- * Programming modem *
- * *
- ***************************
-
-
- **********************************
- *** Setting Modulation Options ***
- **********************************
-
- type "AT&L0*MM0*AY1*LS0*MX7*MN0*AP0*CA0&X0*RT2Y0*MD1&G0",0d,0a
- match "OK"
- iferror MODERR
-
-
- *************************************************************
- *** Setting Error Correction and Data Compression Options ***
- *************************************************************
-
- type "AT*SM3*EC0*DC1*BK0*MF1*SL0",0d,0a
- match "OK"
- iferror EC/DC
-
-
- **********************************************
- *** Set ACU (Automatic Call Unit) settings ***
- **********************************************
-
- type "AT&M1*DA0*AA1E0*MS1Q0V1*XC0",0d,0a
- match "OK"
- iferror ATFORM
-
-
- ****************************
- *** Set Terminal Options ***
- ****************************
-
- type "ATM*FL1*SC1&D6*RS0*CT3&R0*DL0&C1*CD3*MR0&S1*OS0*DT0",0d,0a
- match "OK"
- iferror TERMERR
-
- * TELCO OPTIONS (SET MODEM SPEAKER ON AND VOLUME MEDIUM)
- type "ATM1",0d,0a
- match "OK"
- iferror TELCO
-
-
- goto bye
- :TELCO
- print "TELCO ERROR"
- goto exit
- :bye_t1
- print "Error during modem programming. Type failed."
- goto exit
- :TERMERR
- print "ERROR WHILE SETTING TERMINAL OPTIONS"
- goto exit
- :EC/DC
- print "ERROR WHILE SETTING EC/DC OPTIONS"
- goto exit
- :MODERR
- print "ERROR WHILE SETTING MODULATION OPTIONS"
- goto exit
- :ATFORM
- print "ERROR WHILE SETTING ACU OPTIONS"
- goto exit
-
- :bye_m1
- print "No answer from modem."
- goto exit
-
- :bye_comm
- print "**** INIT ERROR !!"
- goto exit
-
-
-
- :bye
- print "Modem programmed successfully"
-
- :exit
-